home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2003 #12 / Amiga Plus CD - 2003 - No. 12.iso / AmigaPlus / Tools / AmigaSystem / Pixload-4.2 / Sound-DT-41 / Install < prev    next >
Text File  |  1998-11-28  |  3KB  |  92 lines
  1. ; $VER: Installer script for SoundDT 1.2 (28.11.98) © 1998 by Stephan Rupprecht
  2.  
  3. (set @default-dest "SYS:classes/datatypes")
  4.  
  5. ;--- localize strings ----
  6. (if (= @language "deutsch")
  7. (
  8.     (set #wrongver "SoundDT benötigt mindestens AmigaOS3.0.\nInstallation kann nicht durchgeführt werden.")
  9.     (set #backup "Soll der alte sound.datatype gesichert werden?")
  10.     (set #backup_help "Wenn Sie 'Ja' selektieren, so wird der alte sound.datatype unter 'sound.datatype.bak' gesichert.");
  11.     (set #found_8svx "Der '8svx.datatype' ist auf Ihrem System installiert.\nDieser wird nun durch den neuen 'svx.datatype' ersetzt.\nDie Deskriptordatei für 8svx wird in das 'Storage'\nVerzeichnis Ihrer Systempartition bewegt.")
  12.     (set #found_16sv "Der '16sv.datatype' ist auf Ihrem System installiert.\nDieser wird nun durch den neuen 'svx.datatype' ersetzt.\nDie Deskriptordatei für 16sv wird in das 'Storage'\nVerzeichnis Ihrer Systempartition bewegt.")
  13.     (set #endmsg "Sie sollten nun Ihren Rechner neu starten!")
  14. )
  15. (
  16.     (set #wrongver "SoundDT requires at least AmigaOS3.0\nInstallation aborted.")
  17.     (set #backup "Do you wish to backup the old sound.datatypes?")
  18.     (set #backup_help "If you select 'Yes', the old sound.datatype will be renamed as sound.datatype.bak.")
  19.     (set #found_8svx "You've '8svx.datatype' installed.\nThis datatype will now be replaced by the new 'svx.datatype'.\nThe descriptor-file for 8svx will be moved to\nthe 'Storage' drawer of your SYS: partition.")
  20.     (set #found_16sv "You've '16sv.datatype' installed.\nThis datatype will now be replaced by the new 'svx.datatype'.\nThe descriptor-file for 16sv will be moved to\nthe 'Storage' drawer of your SYS: partition.")
  21.     (set #endmsg "To make the changes active you need to restart your computer!");
  22. )
  23. )
  24.  
  25. ;--- check os version ---
  26. (set #vernum (getversion "exec.library" (resident)))
  27. (set #vernum (/ #vernum 65536))
  28.  
  29. (if(< #vernum 39)
  30.     (abort #wrongver)
  31. )
  32.  
  33. ;--- lets rock ---
  34. (set #choice
  35.     (askbool 
  36.         (prompt #backup)
  37.         (help    #backup_help)
  38.         (default 1)
  39.     )
  40. )
  41.  
  42. (if (= #choice 1) 
  43. (
  44.     (rename "sys:classes/datatypes/sound.datatype" "sys:classes/datatypes/sound.datatype.bak")
  45. )
  46. )
  47.  
  48. (copyfiles
  49.     (source "datatypes/sound.datatype")
  50.     (dest @default-dest)
  51. )
  52.  
  53. ;--- move old descriptor files to storage, if found ---
  54. (if (exists "DEVS:DataTypes/8SVX")
  55. (
  56.     (message #found_8svx)
  57.     (rename "DEVS:DataTypes/8SVX" "SYS:Storage/DataTypes/8SVX")
  58.     (rename "DEVS:DataTypes/8SVX.info" "SYS:Storage/DataTypes/8SVX.info")
  59. )
  60. )
  61.  
  62. (if (exists "DEVS:DataTypes/16SV")
  63. (
  64.     (message #found_16sv)
  65.     (rename "DEVS:DataTypes/16SV" "SYS:Storage/DataTypes/16SV")
  66.     (rename "DEVS:DataTypes/16SV.info" "SYS:Storage/DataTypes/16SV.info")
  67. )
  68. )
  69.  
  70. ;--- install svx.datatype ---
  71. (copyfiles
  72.     (source "datatypes/svx.datatype")
  73.     (dest @default-dest)
  74. )
  75.  
  76. (if (not (exists "DEVS:DataTypes/SVX") )
  77. (
  78.     (copyfiles
  79.         (source "datatypes/SVX")
  80.         (dest "DEVS:DataTypes")
  81.     )
  82.  
  83.     (copyfiles
  84.         (source "datatypes/SVX.info")
  85.         (dest "DEVS:DataTypes")
  86.     )
  87. )
  88. )
  89.  
  90. (message #endmsg)
  91. ;--- eof ---
  92.